home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 49 / Amiga Format CD49 (2000-01-17)(Future Publishing)(GB)(Track 1 of 3)[!][issue 2000-02].iso / -serious- / programming / e / powerd0.06 / modules / rexx / rexxio.m < prev    next >
Text File  |  1999-11-30  |  612b  |  39 lines
  1. MODULE    'rexx/storage'
  2.  
  3. CONST    RXBUFFSZ=204            // buffer length
  4.  
  5. OBJECT IoBuff
  6.     Node:RexxRsrc,
  7.     Rpt:APTR,
  8.     Rct:LONG,
  9.     DFH:LONG,
  10.     Lock:APTR,
  11.     Bct:LONG,
  12.     Area[RXBUFFSZ]:BYTE
  13.  
  14. ENUM    RXIO_EXIST=-1,
  15.         RXIO_STRF,
  16.         RXIO_READ,
  17.         RXIO_WRITE,
  18.         RXIO_APPEND
  19.  
  20. ENUM    RXIO_BEGIN=-1
  21.         RXIO_CURR,
  22.         RXIO_END
  23.  
  24. // #define LLOFFSET(rrp) (rrp->rr_Arg1)   /* "Query" offset        */
  25. // #define LLVERS(rrp)   (rrp->rr_Arg2)   /* library version        */
  26. // #define CLVALUE(rrp) ((STRPTR) rrp->rr_Arg1)
  27.  
  28. OBJECT RexxMsgPort
  29.     Node:RexxRsrc,
  30.     Port:MsgPort,
  31.     ReplyList:List
  32.  
  33. ENUM    DT_DEV,
  34.         DT_DIR,
  35.         DT_VOL
  36.  
  37. CONST    ACTION_STACK=2002,
  38.         ACTION_QUEUE=2003
  39.